DESABILITAR O CTRL+ALT+DEL e ALT+TAB 


Var
numero: integer;
begin
SystemParametersInfo(97,Word(true),@numero,0);
end;
{ Para habilitar  s chamar a mesma funo com Word(false) }
